package require tkwebview

wm title . "TkWebView Demos"

ttk::frame .f 
pack .f -fill both -expand yes

ttk::button .f.s -text "Standalone Demo" -command WebView_Standalonedemo

set helpfile [file join [file dirname [info script]] help.html]

ttk::button .f.h -text "Help Viewer Demo" -command [list WebView_Helpviewer $helpfile]

ttk::button .f.e -text "Embedded Demo" -command WebView_Embeddeddemo 


pack .f.s .f.h .f.e -fill both -expand yes